object frmExibirPagarReceber: TfrmExibirPagarReceber
  Left = 363
  Top = 243
  Width = 495
  Height = 248
  BorderIcons = [biSystemMenu]
  Caption = 'Controle de Contas'
  Color = clHighlightText
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object lblMsg02: TLabel
    Left = 7
    Top = 156
    Width = 277
    Height = 24
    Caption = 'Nenhuma Conta a Pagar Hoje'
    Color = clHighlightText
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -21
    Font.Name = 'Arial'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object lblPagar: TLabel
    Left = 8
    Top = 127
    Width = 260
    Height = 30
    Cursor = crHandPoint
    Caption = 'Contas a Pagar [ 0,00 ]'
    Color = clHighlightText
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -21
    Font.Name = 'Arial Black'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object lblMsg01: TLabel
    Left = 8
    Top = 79
    Width = 301
    Height = 24
    Caption = 'Nenhuma Conta a Receber Hoje'
    Color = clHighlightText
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -21
    Font.Name = 'Arial'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object lblReceber: TLabel
    Left = 8
    Top = 48
    Width = 289
    Height = 30
    Cursor = crHandPoint
    Caption = 'Contas a Receber [ 0,00 ]'
    Color = clHighlightText
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -21
    Font.Name = 'Arial Black'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object ZSqlPagarReceber: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    SQL.Strings = (
      'select RT.REC_TITULO, P.PES_NOME , RT.REC_EMISSAO,'
      'REP_VALOR, REP_VENCIMENTO, '
      'RTP.REP_DTHBAIXA, RTP.REP_VALOR_RECEBIDO, '
      'RTP.REP_PARCELA '
      'from RECEBER_TITULOS RT'
      'inner join PESSOAS P  on P.PES_IDFCOD = RT.REC_PESSOA'
      'inner join RECEBER_TITULOS_PARCELAS RTP '
      'ON RTP.REP_IDFTITULO = RT.REC_IDFTITULO')
    Params = <>
    Left = 378
    Top = 86
  end
end
